home *** CD-ROM | disk | FTP | other *** search
/ The PC-SIG Library 10 / The PC-Sig Library - Shareware for the IBM PC and Compatibles (PC-SIG)(Tenth Edition Disks 1-2804)(1991).iso / PC_SIGCD / 24 / 7 / DISK2472.ZIP / BOOKIT.BAT next >
DOS Batch File  |  1990-05-06  |  1KB  |  60 lines

  1. @Echo off
  2. Cls
  3. Echo Project "%1" being   B O O K E D  for comparative Gantt charts.
  4. : This batch file will keep a maximum of 10 backups of project.REF files.
  5. : To see the old files enter "VIEW PLANxx" where xx is 01 to 10.
  6. If .%1 == . Syntax1 %0
  7. Echo ----------------------------------------------------------------------
  8. If exist %1 Syntax2 %0 %1 %2 %3 %4 %5 %6 %7
  9. If not exist %1.PRT Syntax3 %0 %1 %2 %3 %4 %5 %6 %7
  10. If Not Exist %1.REF GoTo Done
  11. If Not Exist Plan01.REF GoTo Set01
  12. If Not Exist Plan02.REF GoTo Set02
  13. If Not Exist Plan03.REF GoTo Set03
  14. If Not Exist Plan04.REF GoTo Set04
  15. If Not Exist Plan05.REF GoTo Set05
  16. If Not Exist Plan06.REF GoTo Set06
  17. If Not Exist Plan07.REF GoTo Set07
  18. If Not Exist Plan08.REF GoTo Set08
  19. If Not Exist Plan09.REF GoTo Set09
  20. If Not Exist Plan10.REF GoTo Set10
  21. Echo All backups are full. Please erases or rename the "PLAN??.REF" files.
  22. GoTo Exit
  23. :Set01
  24. Copy %1.REF Plan01.REF >Nul
  25. GoTo Done
  26. :Set02
  27. Copy %1.REF Plan02.REF >Nul
  28. GoTo Done
  29. :Set03
  30. Copy %1.REF Plan03.REF >Nul
  31. GoTo Done
  32. :Set04
  33. Copy %1.REF Plan04.REF >Nul
  34. GoTo Done
  35. :Set05
  36. Copy %1.REF Plan05.REF >Nul
  37. GoTo Done
  38. :Set06
  39. Copy %1.REF Plan06.REF >Nul
  40. GoTo Done
  41. :Set07
  42. Copy %1.REF Plan07.REF >Nul
  43. GoTo Done
  44. :Set08
  45. Copy %1.REF Plan08.REF >Nul
  46. GoTo Done
  47. :Set09
  48. Copy %1.REF Plan09.REF >Nul
  49. GoTo Done
  50. :Set10
  51. Copy %1.REF Plan10.REF >Nul
  52. :Done
  53. Copy C:\Packages\GanttPac\BookIt.KBG %1.GKB >nul
  54. Gantt2 %1
  55. Erase %1.GKB
  56. Menu %1
  57. :Exit
  58. Pause
  59. Menu %1
  60.